﻿Imports BUS
Imports DTO
Public Class frmPHIEUGIAOHANG

    Private Sub btt_thoat_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)
        Me.Close()
    End Sub

    Private Sub btn_them_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_them.Click
        Dim _PGbus As New PhieuGiaoBUS
        Dim PGBus As New PhieuGiaoDTO
        PGBus.MaPG = txt_sophieu.Text
        PGBus.NgayGiao = dtp_ngayxuat.Value
        PGBus.MaHang = txt_makhachhang.Text
        PGBus.SoLuong = txt_solg.Text
        PGBus.DonGia = txt_Dongia.Text
        PGBus.MaKH = txt_makhachhang.Text
        PGBus.SDT = txt_sodt.Text
        PGBus.DiaChi = txt_diachi.Text
        _PGbus.ThempG(PGBus)
        MessageBox.Show("Da Them Thanh Cong")
    End Sub


    Private Sub btn_xoa_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_xoa.Click

    End Sub

    Private Sub frmPHIEUGIAOHANG_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub
End Class